perm filename DD[SYS,BGB] blob sn#100507 filedate 1974-05-08 generic text, type T, neo UTF8
REQUIRE "DDCALL" LOAD_MODULE;

EXTERNAL PROCEDURE ERASTV;
EXTERNAL PROCEDURE ERASDD;
EXTERNAL PROCEDURE DPYDD  (STRING FILE;INTEGER ARRAY SWINDO,OWINDO,LEVELS);

EXTERNAL PROCEDURE SETWND (REAL ARRAY SWN; INTEGER ARRAY DWN);
EXTERNAL PROCEDURE SETLWN (REAL LX,LY,LDX,LDY);
EXTERNAL PROCEDURE SETDWN (INTEGER R,C,M,N );

EXTERNAL PROCEDURE AI     (SHORT REAL X,Y);
EXTERNAL PROCEDURE AV     (SHORT REAL X,Y);
EXTERNAL PROCEDURE DOT    (SHORT REAL X,Y);
EXTERNAL PROCEDURE ARC    (REAL R,A,B);
EXTERNAL PROCEDURE RADIAL (REAL R1,R2,B);
EXTERNAL REAL PROCEDURE DMS (INTEGER X);

EXTERNAL PROCEDURE DDSTR  (REAL    X,Y,CHN;STRING STR);
EXTERNAL PROCEDURE DDSTRC (INTEGER R,C,CHN; STRING S);
EXTERNAL PROCEDURE DDTYPE (INTEGER Y,GLITCHES,LINES);

EXTERNAL PROCEDURE SHOWDD (INTEGER LEVCHN);
EXTERNAL PROCEDURE DRUMDD (INTEGER FRAME);
EXTERNAL PROCEDURE TVSEG  (STRING FILE,SEGNAM);